﻿Imports System.Data.SqlClient

Public Class PhieuBanHangDAO

    Shared Function layMaPhieu() As String
        Dim valist As New List(Of SqlParameter)
        Dim para As SqlParameter
        para = New SqlParameter("MaPhieu", SqlDbType.VarChar, 13)
        para.Direction = ParameterDirection.Output
        valist.Add(para)
        Return CKetNoi.ExecQueryStoreProcReturnValueOfStore("usp_LayMaPhieu", valist, "MaPhieu")
    End Function

End Class
